unit TRefOrderLog;

interface

uses
  Windows, Classes, SysUtils, uDataTransferObject, uBasicDAOAdapter;

type
  TRefOrderLogVO = class(TDataTransferObject)
  private
    FOrderLogId: string;
    FWorkNo: string;
    FoperId:String;
    FCreateTime:String;
    FOperation:String;
    FOperDetails:String;
    FStatus:String;
  published
    property PK_Order_Log_Id: string index 0 read FOrderLogId write FOrderLogId;
    property work_no: string index 1 read FWorkNo write FWorkNo;
    property oper_id: string index 2 read FoperId write FoperId;
    property create_Time: string index 3 read FCreateTime write FCreateTime;
    property operation: String index 4 read FOperation write FOperation;
    property oper_Details: string index 5 read FOperDetails write FOperDetails;
    property status: String index 6 read FStatus write FStatus;
  public
    constructor Create;
    procedure Reset();
  end;

implementation

constructor TRefOrderLogVO.Create;
begin
  inherited Create;
  tbName := 'inf_ref_order_log';
  SetLength(GridInfo, 5);
end;

procedure TRefOrderLogVO.Reset();
begin
  FOrderLogId:='-999';
  FWorkNo:='-999';
  FoperId:='-999';
  FCreateTime:='-999';
  FOperation:='-999';
  FOperDetails:='-999';
  FStatus:='-999';
end;


end.
